PlantsPhenology.f90 Source File

Simulate plants grow and climate interaction (TODO)



Source Code

!! Simulate plants grow and climate interaction (TODO)
!|author:  <a href="mailto:giovanni.ravazzani@polimi.it">Giovanni Ravazzani</a>
! license: <a href="http://www.gnu.org/licenses/">GPL</a>
!    
!### History
!
! current version  1.0 - 6th May 2019 
!
! | version  |  date       |  comment |
! |----------|-------------|----------|
! | 1.0      | 6/May/2019 | Original code |
!
!### License  
! license: GNU GPL <http://www.gnu.org/licenses/>
!
!### Module Description 
! Routines to model plants grow and climate interaction (TODO)
! 
MODULE PlantsPhenology

! Modules used:


USE DataTypeSizes, ONLY : &
   ! Imported Type Definitions:
   short, float


IMPLICIT NONE

!global routines:
PUBLIC :: AccGrowingDegreeDay

!=======
    CONTAINS
!=======

!==============================================================================
!| Description:
!  compute accumulated growing degree day (GDD), sum of growing degree day 
!  over days. Start accumulate when daily GDD > 0
!
SUBROUTINE  AccGrowingDegreeDay &
!
()
    
IMPLICIT NONE

RETURN 
END SUBROUTINE AccGrowingDegreeDay

END MODULE PlantsPhenology